home *** CD-ROM | disk | FTP | other *** search
- <?php
- /*
- ** $Id: accounts_edit.php,v 1.7 2005/04/05 20:19:10 hmailserver Exp $
- **
- ** hMailServer - Web interface
- **
- ** File formatted using TAB size 4
- **
- ** Get hMailserver at http://www.hmailserver.com
- **
- ** Author: Steen Rab°l <srabol@mail.tele.dk>
- ** Copyright (c) 2004, Steen Rab°l <srabol@mail.tele.dk>
- **
- ** This program is free software; you can redistribute it and/or modify
- ** it under the terms of the GNU General Public License as published by
- ** the Free Software Foundation; either version 2 of the License, or
- ** (at your option) any later version.
- **
- ** You may not change or alter any portion of this comment or credits
- ** of supporting developers from this source code or any supporting
- ** source code which is considered copyrighted (c) material of the
- ** original comment or credit authors.
- **
- ** This program is distributed in the hope that it will be useful,
- ** but WITHOUT ANY WARRANTY; without even the implied warranty of
- ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- ** GNU General Public License for more details.
- **
- ** You should have received a copy of the GNU General Public License
- ** along with this program; if not, write to the Free Software
- ** Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
- **
- */
-
- $DomainID = hmailGetVar("DomainID",0);
- $AccountID = hmailGetVar("AccountID",0);
- $function = hmailGetVar("function","");
- $obDomain = $obBaseApp->Domains->ItemByDBID($DomainID);
-
- if (hmailGetAdminLevel() == 0 && $AccountID != hmailGetAccountID())
- hmailHackingAttemp(); // Domain admin but not for this domain.
-
- if (hmailGetAdminLevel() == 1 && $DomainID != hmailGetDomainID())
- hmailHackingAttemp(); // Domain admin but not for this domain.
-
- $admin_rights = (hmailGetAdminLevel() === ADMIN_SERVER ||
- hmailGetAdminLevel() === ADMIN_DOMAIN);
-
- $hmailSmarty->assign("admin_rights",$admin_rights);
-
- switch($function)
- {
- case "doedit":
-
- $obAccounts = $obDomain->Accounts();
- $obAccount = $obAccounts->ItemByDBID($AccountID);
-
- // The following properties are only changable
- // by a server admin or a domain admin.
- if ($admin_rights)
- {
- $obAccount->MaxSize = hmailGetVar("MaxSize");
- $obAccount->Active = (hmailGetVar("Active") == "1") ? 1 : 0;
- $obAccount->Address = hmailGetVar("Address") . "@" . $obDomain->Name;
- }
-
- // Password is changeable by the user.
- if (!(hmailGetVar("Password") == ""))
- $obAccount->Password = hmailGetVar("Password");
-
- $obAccount->Save();
-
- header("refresh: 0; url=index.php?page=accounts_edit&AccountID=$AccountID&DomainID=$DomainID");
-
- exit();
- break;
-
- default:
- $obAccounts = $obDomain->Accounts();
- $obAccount = $obAccounts->ItemByDBID($AccountID);
-
- $address = substr($obAccount->Address, 0, strpos($obAccount->Address, "@"));
-
- $hmailSmarty->assign("address",$address);
- $hmailSmarty->assign("account",$obAccount);
- $hmailSmarty->assign("domain",$obDomain);
- $hmailSmarty->assign("accountsize", Round($obAccount->Size(), 3));
- $hmailSmarty->assign("pagecontent", $hmailSmarty->fetch('accounts_edit.tpl'));
- break;
- }
- ?>